home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Markets / Education / HyperCard In Education / MapStack / card_3110.txt < prev    next >
Text File  |  1990-04-02  |  12KB  |  512 lines
  1. -- card: 3110 from stack: in
  2. -- bmap block id: 4504
  3. -- flags: 0000
  4. -- background id: 2683
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on OpenCard
  8.   hide card field "Drag Scroll"
  9. end OpenCard
  10.  
  11.  
  12.  
  13. -- part 1 (button)
  14. -- low flags: 00
  15. -- high flags: 0001
  16. -- rect: left=0 top=288 right=319 bottom=40
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 1014 / 1014
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: New Button
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   visual effect dissolve slow to white
  28.   go to card id 3574
  29. end mouseUp
  30.  
  31.  
  32.  
  33. -- part 6 (field)
  34. -- low flags: 80
  35. -- high flags: 0007
  36. -- rect: left=205 top=114 right=272 bottom=491
  37. -- title width / last selected line: 0
  38. -- icon id / first selected line: 0 / 0
  39. -- text alignment: 0
  40. -- font id: 3
  41. -- text size: 12
  42. -- style flags: 0
  43. -- line height: 16
  44. -- part name: Drag Scroll
  45.  
  46.  
  47. -- part 8 (button)
  48. -- low flags: 00
  49. -- high flags: 8002
  50. -- rect: left=154 top=302 right=333 bottom=336
  51. -- title width / last selected line: 0
  52. -- icon id / first selected line: 0 / 0
  53. -- text alignment: 1
  54. -- font id: 0
  55. -- text size: 12
  56. -- style flags: 0
  57. -- line height: 16
  58. -- part name: Show Hannibal's Path #1
  59. ----- HyperTalk script -----
  60. on mouseUp
  61.   choose  brush tool
  62.   set dragspeed to 100
  63.  
  64.   domenu "Select All"
  65.   domenu "Copy Picture"
  66.  
  67.   set pattern to 12
  68.   set brush to 8
  69.   global Num
  70.   repeat with Num = 1 to Number of lines in card field "Drag Scroll"
  71.     if the MouseClick then exit repeat
  72.     do line num of card field "Drag Scroll"
  73.   end repeat
  74.  
  75.  
  76.   put "Press Mouse when satisfied"
  77.   wait until the MouseClick
  78.   hide message box
  79.   domenu "Paste Picture"
  80.  
  81.   choose browse tool
  82. end mouseUp
  83.  
  84.  
  85.  
  86. -- part 14 (button)
  87. -- low flags: 00
  88. -- high flags: 2002
  89. -- rect: left=33 top=230 right=243 bottom=46
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 1018 / 1018
  92. -- text alignment: 1
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: Crossing the Rhone
  98. ----- HyperTalk script -----
  99. on mouseUp
  100.   push card
  101.  
  102.   go to card id 2818 of stack "Hannibal"
  103. end mouseUp
  104.  
  105.  
  106.  
  107.  
  108. -- part 15 (button)
  109. -- low flags: 00
  110. -- high flags: 2002
  111. -- rect: left=45 top=140 right=155 bottom=59
  112. -- title width / last selected line: 0
  113. -- icon id / first selected line: 1018 / 1018
  114. -- text alignment: 1
  115. -- font id: 0
  116. -- text size: 12
  117. -- style flags: 0
  118. -- line height: 16
  119. -- part name: The Meeting on 'the Island'
  120. ----- HyperTalk script -----
  121. on mouseUp
  122.   push card
  123.  
  124.   go to card id 3699 of stack "Hannibal"
  125. end mouseUp
  126.  
  127.  
  128.  
  129. -- part 16 (button)
  130. -- low flags: 00
  131. -- high flags: 2002
  132. -- rect: left=103 top=40 right=53 bottom=117
  133. -- title width / last selected line: 0
  134. -- icon id / first selected line: 1018 / 1018
  135. -- text alignment: 1
  136. -- font id: 0
  137. -- text size: 12
  138. -- style flags: 0
  139. -- line height: 16
  140. -- part name: First Battle
  141. ----- HyperTalk script -----
  142. on mouseUp
  143.   push card
  144.  
  145.   go to card id 4572 of stack "Hannibal"
  146. end mouseUp
  147.  
  148.  
  149.  
  150. -- part 17 (button)
  151. -- low flags: 00
  152. -- high flags: 2002
  153. -- rect: left=202 top=39 right=52 bottom=214
  154. -- title width / last selected line: 0
  155. -- icon id / first selected line: 1018 / 1018
  156. -- text alignment: 1
  157. -- font id: 0
  158. -- text size: 12
  159. -- style flags: 0
  160. -- line height: 16
  161. -- part name: Second Battle
  162. ----- HyperTalk script -----
  163. on mouseUp
  164.   push card
  165.  
  166.   go to card id 4835 of stack "Hannibal"
  167. end mouseUp
  168.  
  169.  
  170.  
  171. -- part 18 (button)
  172. -- low flags: 00
  173. -- high flags: 2002
  174. -- rect: left=265 top=60 right=73 bottom=279
  175. -- title width / last selected line: 0
  176. -- icon id / first selected line: 1018 / 1018
  177. -- text alignment: 1
  178. -- font id: 0
  179. -- text size: 12
  180. -- style flags: 0
  181. -- line height: 16
  182. -- part name: The Descent
  183. ----- HyperTalk script -----
  184. on mouseUp
  185.   push card
  186.  
  187.   go to card id 4882 of stack "Hannibal"
  188. end mouseUp
  189.  
  190.  
  191.  
  192. -- part 20 (button)
  193. -- low flags: 00
  194. -- high flags: 8002
  195. -- rect: left=402 top=307 right=342 bottom=512
  196. -- title width / last selected line: 0
  197. -- icon id / first selected line: 0 / 0
  198. -- text alignment: 1
  199. -- font id: 0
  200. -- text size: 12
  201. -- style flags: 0
  202. -- line height: 16
  203. -- part name: Alternate Path
  204. ----- HyperTalk script -----
  205. on mouseUp
  206.   visual effect wipe left slow
  207.   go to card id 3054
  208. end mouseUp
  209.  
  210.  
  211.  
  212. -- part 21 (button)
  213. -- low flags: 00
  214. -- high flags: 0000
  215. -- rect: left=199 top=213 right=260 bottom=259
  216. -- title width / last selected line: 0
  217. -- icon id / first selected line: 0 / 0
  218. -- text alignment: 1
  219. -- font id: 0
  220. -- text size: 12
  221. -- style flags: 0
  222. -- line height: 16
  223. -- part name: New Button
  224. ----- HyperTalk script -----
  225. on mouseUp
  226.   play "Elephant"
  227. end mouseUp
  228.  
  229.  
  230.  
  231. -- part 22 (button)
  232. -- low flags: 00
  233. -- high flags: 0000
  234. -- rect: left=256 top=213 right=229 bottom=301
  235. -- title width / last selected line: 0
  236. -- icon id / first selected line: 0 / 0
  237. -- text alignment: 1
  238. -- font id: 0
  239. -- text size: 12
  240. -- style flags: 0
  241. -- line height: 16
  242. -- part name: New Button
  243. ----- HyperTalk script -----
  244. on mouseUp
  245.   Play "Elephant"
  246. end mouseUp
  247.  
  248.  
  249.  
  250. -- part 26 (button)
  251. -- low flags: 00
  252. -- high flags: 0000
  253. -- rect: left=309 top=51 right=70 bottom=338
  254. -- title width / last selected line: 0
  255. -- icon id / first selected line: 0 / 0
  256. -- text alignment: 1
  257. -- font id: 0
  258. -- text size: 12
  259. -- style flags: 0
  260. -- line height: 16
  261. -- part name: Historians
  262. ----- HyperTalk script -----
  263. on mouseUp
  264.   show card field "Historians Info"
  265.   wait until the MouseClick
  266.   hide card field "Historians Info"
  267. end mouseUp
  268.  
  269.  
  270.  
  271. -- part 27 (field)
  272. -- low flags: 80
  273. -- high flags: 0002
  274. -- rect: left=309 top=111 right=205 bottom=505
  275. -- title width / last selected line: 0
  276. -- icon id / first selected line: 0 / 0
  277. -- text alignment: 0
  278. -- font id: 3
  279. -- text size: 12
  280. -- style flags: 0
  281. -- line height: 16
  282. -- part name: Historians Info
  283.  
  284.  
  285. -- part 33 (button)
  286. -- low flags: 00
  287. -- high flags: 8002
  288. -- rect: left=93 top=294 right=342 bottom=154
  289. -- title width / last selected line: 0
  290. -- icon id / first selected line: 9944 / 9944
  291. -- text alignment: 1
  292. -- font id: 0
  293. -- text size: 12
  294. -- style flags: 0
  295. -- line height: 16
  296. -- part name: Bibliography
  297. ----- HyperTalk script -----
  298. on mouseUp
  299.   push card
  300.   visual effect wipe up slow
  301.   go to card id 12060 of stack "Hannibal"
  302. end mouseUp
  303.  
  304.  
  305.  
  306. -- part 36 (button)
  307. -- low flags: 00
  308. -- high flags: A002
  309. -- rect: left=16 top=319 right=340 bottom=76
  310. -- title width / last selected line: 0
  311. -- icon id / first selected line: 0 / 0
  312. -- text alignment: 1
  313. -- font id: 0
  314. -- text size: 12
  315. -- style flags: 0
  316. -- line height: 16
  317. -- part name: Return
  318. ----- HyperTalk script -----
  319. on mouseUp
  320.   global returncard
  321.   go to returncard
  322. end mouseUp
  323.  
  324.  
  325.  
  326. -- part contents for card part 27
  327. ----- text -----
  328.   Historians agree that Hannibal started at the Rhone and ended up in Turin, but it's how he got there that is debated.
  329.        (Click to Continue)
  330.  
  331. -- part contents for card part 6
  332. ----- text -----
  333. Drag from  3,252  to  5,252
  334. Drag from  5,252  to  3,254
  335. Drag from  3,254  to  4,254
  336. Drag from  4,254  to  11,253
  337. Drag from  11,253  to  14,251
  338. Drag from  14,251  to  18,249
  339. Drag from  18,249  to  20,247
  340. Drag from  20,247  to  21,245
  341. Drag from  21,245  to  23,243
  342. Drag from  23,243  to  26,241
  343. Drag from  26,241  to  31,239
  344. Drag from  31,239  to  33,237
  345. Drag from  33,237  to  38,235
  346. Drag from  38,235  to  40,234
  347. Drag from  40,234  to  40,233
  348. Drag from  40,233  to  41,232
  349. put ""
  350. put "The Crossing of the Rhone River"
  351. wait 2 seconds
  352. Drag from  41,232  to  44,228
  353. Drag from  44,228  to  45,226
  354. Drag from  45,226  to  45,223
  355. Drag from  45,223  to  47,220
  356. Drag from  47,220  to  47,217
  357. Drag from  47,217  to  47,216
  358. Drag from  47,216  to  48,212
  359. Drag from  48,212  to  48,209
  360. Drag from  48,209  to  51,203
  361. Drag from  51,203  to  52,200
  362. Drag from  52,200  to  54,198
  363. Drag from  54,198  to  57,195
  364. Drag from  57,195  to  60,189
  365. Drag from  60,189  to  61,187
  366. Drag from  61,187  to  64,185
  367. Drag from  64,185  to  66,182
  368. Drag from  66,182  to  67,180
  369. Drag from  67,180  to  68,178
  370. Drag from  68,178  to  68,176
  371. Drag from  68,176  to  68,174
  372. Drag from  68,174  to  68,172
  373. Drag from  68,172  to  67,171
  374. Drag from  67,171  to  66,170
  375. Drag from  66,170  to  65,170
  376. Drag from  65,170  to  64,167
  377. Drag from  64,167  to  61,165
  378. Drag from  61,165  to  60,164
  379. Drag from  60,164  to  57,163
  380. Drag from  57,163  to  56,162
  381. Drag from  56,162  to  55,161
  382. Drag from  55,161  to  54,159
  383. Drag from  54,159  to  53,158
  384. Drag from  53,158  to  53,156
  385. Drag from  53,156  to  54,152
  386. Drag from  54,152  to  56,149
  387. Drag from  56,149  to  56,147
  388. Drag from  56,147  to  54,145
  389. put ""
  390. put "The Meeting at 'The Island'"
  391. wait 2 seconds
  392. Drag from  54,145  to  52,142
  393. Drag from  52,142  to  51,141
  394. Drag from  51,141  to  50,140
  395. Drag from  50,140  to  50,136
  396. Drag from  50,136  to  50,132
  397. Drag from  50,132  to  50,128
  398. Drag from  50,128  to  50,124
  399. Drag from  50,124  to  50,120
  400. Drag from  50,120  to  51,116
  401. Drag from  51,116  to  51,112
  402. Drag from  51,112  to  51,108
  403. Drag from  51,108  to  51,102
  404. Drag from  51,102  to  51,100
  405. Drag from  51,100  to  52,96
  406. Drag from  52,96  to  53,90
  407. Drag from  53,90  to  54,87
  408. Drag from  54,87  to  55,84
  409. Drag from  55,84  to  57,80
  410. Drag from  57,80  to  59,78
  411. Drag from  59,78  to  61,75
  412. Drag from  61,75  to  63,72
  413. Drag from  63,72  to  66,69
  414. Drag from  66,69  to  68,66
  415. Drag from  68,66  to  71,65
  416. Drag from  71,65  to  72,63
  417. Drag from  72,63  to  75,61
  418. Drag from  75,61  to  79,59
  419. Drag from  79,59  to  82,56
  420. Drag from  82,56  to  84,55
  421. Drag from  84,55  to  85,53
  422. Drag from  85,53  to  86,53
  423. Drag from  86,53  to  90,51
  424. Drag from  90,51  to  93,50
  425. Drag from  93,50  to  97,47
  426. Drag from  97,47  to  100,46
  427. Drag from  100,46  to  100,46
  428. Drag from  100,46  to  101,46
  429. Drag from  101,46  to  102,48
  430. Drag from  102,48  to  107,52
  431. put ""
  432. put "The First Battle"
  433. wait 2 seconds
  434. Drag from  107,52  to  110,55
  435. Drag from  110,55  to  110,55
  436. Drag from  110,55  to  113,56
  437. Drag from  113,56  to  114,57
  438. Drag from  114,57  to  120,58
  439. Drag from  120,58  to  124,60
  440. Drag from  124,60  to  132,62
  441. Drag from  132,62  to  133,62
  442. Drag from  133,62  to  139,62
  443. Drag from  139,62  to  143,62
  444. Drag from  143,62  to  144,62
  445. Drag from  144,62  to  145,61
  446. Drag from  145,61  to  145,61
  447. Drag from  145,61  to  149,57
  448. Drag from  149,57  to  153,55
  449. Drag from  153,55  to  156,53
  450. Drag from  156,53  to  160,51
  451. Drag from  160,51  to  161,50
  452. Drag from  161,50  to  162,48
  453. Drag from  162,48  to  162,47
  454. Drag from  162,47  to  163,45
  455. Drag from  163,45  to  166,45
  456. Drag from  166,45  to  166,45
  457. Drag from  166,45  to  166,45
  458. Drag from  166,45  to  168,41
  459. Drag from  168,41  to  170,37
  460. Drag from  170,37  to  173,33
  461. Drag from  173,33  to  175,32
  462. Drag from  175,32  to  183,29
  463. Drag from  183,29  to  190,29
  464. Drag from  190,29  to  193,29
  465. Drag from  193,29  to  197,28
  466. Drag from  197,28  to  197,28
  467. Drag from  197,28  to  204,30
  468. Drag from  204,30  to  205,33
  469. Drag from  205,33  to  205,38
  470. Drag from  205,38  to  205,43
  471. Drag from  205,43  to  205,46
  472. Drag from  205,46  to  205,50
  473. Drag from  205,50  to  206,53
  474. put ""
  475. put "The Second Battle"
  476. wait 2 seconds
  477. Drag from  206,53  to  210,55
  478. Drag from  210,55  to  215,56
  479. Drag from  215,56  to  221,57
  480. Drag from  221,57  to  224,57
  481. Drag from  224,57  to  233,61
  482. Drag from  233,61  to  236,61
  483. Drag from  236,61  to  243,61
  484. Drag from  243,61  to  249,62
  485. Drag from  249,62  to  252,64
  486. Drag from  252,64  to  255,66
  487. Drag from  255,66  to  256,69
  488. put ""
  489. put "The Pass through the Summit"
  490. wait 2 seconds
  491. Drag from  256,69  to  258,73
  492. Drag from  258,73  to  260,75
  493. Drag from  260,75  to  260,81
  494. Drag from  260,81  to  260,85
  495. Drag from  260,85  to  263,86
  496. Drag from  263,86  to  268,86
  497. Drag from  268,86  to  273,84
  498. Drag from  273,84  to  278,82
  499. Drag from  278,82  to  286,78
  500. Drag from  286,78  to  293,76
  501. Drag from  293,76  to  298,74
  502. Drag from  298,74  to  304,70
  503. Drag from  304,70  to  309,69
  504. Drag from  309,69  to  314,68
  505. Drag from  314,68  to  318,68
  506. Drag from  318,68  to  321,67
  507. Drag from  321,67  to  325,66
  508. Drag from  325,66  to  325,66
  509. put ""
  510. put "The End of the Crossing of the Alps"
  511. wait 4 seconds
  512.